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Appendix D 

This Appendix describes a Macro Library for a board according to the present 
invention. The library contains functions for 

1) Memory arbitration 

2) Flash bus arbitration 

3) Read and Write to Flash RAM 

4) FPCOM settings 

5) Control of the LEDs 

IIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIM 
II 

II Interfaces 

// 



tu 

'£ 15 // Shared RAM arbitration 



// 



fc* // KRequestMemoryBank(bankMask) 

// KReleaseMemoryBank(bankMask) 



e" " 

20 // Flash RAM Macros 

// 

// KEnableFlashO 

// KDisableFlashO 

// KSetFlashAddress(address) 

25 // KWriteFlashData(address, data) 

// KReadFlashData(address, data) 

// KReadFlashID(flash_component_ID, manufacturerlD) 
// 
// 
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// Flash bus arbitration 

// 

// KSetFPGAFBMO 

// KReleaseFPGAFBMO 

// 

// Others 

// 

// KSetLEDs(maskByte) 
// KSetFPCOM(fbcom) 



15 #ifhdef_KOMPPvESSOR_LIBRARY 
#define _KOMPRESSOR_LIBRARY 

// Include header file 

//#include "KompressorMaster.h" 

20 



//////////////////////////////////////////////////////////////////////////// 
// Request access to a memory bank 
25 // 

// The procedures will block until access to all the requested banks have been 

// granted. 

// 
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unsigned 1 shared_bankO_request = 1 with { warn = 0} ; 
unsigned 1 shared_bankl_request = 1 with { warn = 0} ; 

interface bus_out() shbkOreq(shared_bankO_request) with 

sram_shared_bankO_request_pin; 

interface bus_out() shbklreq(shared_bankl_request) with 

sram_shared_bankl_request_pin; 

interface bus_clock_in(unsigned 1) shbkOgrantO with sram_shared_bankO_grant_pin; 
interface bus_clock_in(unsigned 1) shbklgrantQ with sram_shared_bankl_grant_pin; 



macro proc KRequestMemoryBankOO 
{ 

shared_bankO_request = 0; 
while(shbkOgrant.in) delay; 

} 



macro proc KRequestMemoryBanklO 
{ 

shared_bankl_request = 0; 
while(shbklgrant.in) delay; 

} 
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///////////////////////////////// 
// Release a memory bank 
II 

macro proc KReleaseMemoryBankOO 
{ 

sharedbankOrequest = 1; 

} 

macro proc KReleaseMemoryBanklO 
{ 

sharedbanklrequest = 1; 

} 



//////////////////////////////////////////////// 
// 

25 // Functions for dealing with FP commands 

#define FPSETIDLE (unsigned 3) 7 

#defme FP_READ_STATUS (unsigned 3) 5 
#define FP_CCLK_LOW (unsigned 3) 3 



15 



n 



20 
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#define FP_CCLK_HIGH (unsigned 3) 7 
#define FP_WRITE_CONTROL (unsigned 3) 0 

unsigned 3 fpcom = FP SET IDLE with { warn = 0}; // default 
interface bus_out0 fpcom_bus(fpcom) with FPcom_pins; 

macro proc KSetFPCOM(command) 
{ 

fpcom = command; 

delay; 

delay; 

} 

macro proc KReadCPLDStatus(status) 
{ 

par 

{ 

KDisableFlash(); 
flash_write = 0; 

} 

KSetFPCOM(FP_READ_ST ATUS) ; 

delay; 
delay; 
delay; 
delay; 
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status = flash_data_bus.in; 
par 

{ 

KSetFPCOM(FP_SET_IDLE); 
KEnableFlashO; 

} 

} 



macro proc KWriteCPLDControl(control) 
{ 

KDisableFlashO; 

par 

{ 

flash_data = (unsigned 8) (0 @ control); 
flash_write = 1 ; 

} 



KSetFPCOM(FP_WRITE_CONTROL); 

delay; 
delay; 
delay; 
par 

{ 

KSetFPCOM(FP_SET_IDLE); 
flash_write = 0; 
KEnableFlashO; 




5 ///////////////////////////////////// 
II 

II Flash RAM stuff 

// 
// 



10 // Parameters; 



5"*"! 


II 






h. ■ 


II 


Read/write cycle 


120ns 


Si 


II 


Address to output 


120ns 


Lff 


II 


CE to ouput 




5 


15 // 






5 

0 


II 


CE low to WE low 


0 




II 


write pulse width low 70ns 




ry 


II 


data setup to we high 50ns 




0 


II 


address setup to we hi 55ns 






20 // 


address/data hold 


0ns 




II 


write pulse width high 3 0ns 





25 unsigned 24 flash_address with { warn = 0}; 
unsigned 8 flash_data with { warn = 0}; 

unsigned 1 flash es = 1, flash_we = 1, flash_oe = 1 with { warn = 0}; // initialise to 
high 
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unsigned 1 flash_write = 0 with { warn = 0} ; // controls direction of the data pins 
unsigned 1 flash_on = 0 with { warn = 0} ; // controls the other tristate buses 

interface bus_ts_clock_in(unsigned 24) fiash_address_bus(flash_address, flash_on) 
with {data = FA_pins}; 

interface bus_ts_clock_in(unsigned 1) flash_chipselect(flash_cs, flash_on) with 
flash_cs_pin; 

interface bus_ts_clock_in(unsigned 1) flash_writeenable(flash_we, flashon) with 
flash_we_pin; 

interface bus_ts_clock_in(unsigned 1) flash_outputenable(flash_oe, flash on) with 
fiash_oe_pin; 

interface bus_ts_clock_in(unsigned 8) flash_data_bus(flash_data, flash_write) with 
{data = FD_pins}; 

macro proc KEnableFlashO 
{ 

par 

{ 

flashon = 1; 
flashes = 0; 

} 

} 

macro proc KDisableFlashO 
{ 

par{ 

flashon = 0; 
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flash_cs= 1; 
} 

} 



// Sets up the address on the 

macro proc KSetFlashAddress(address) 

{ 

10 flash_address = address; 

} 



macro proc KWriteFlashData(address, data) 



s . i 



c 15 { 



E 



par // set up address and data and drive onto pins 
{ 

flash_oe = 1; // disable output 
20 flash_address = address; 

flash_data = data; 
flash_write = 1 ; 

flash_we = 0; // send write pulse 
} 



25 



// running at 50/2 MHz - 40 ns cycles - 2 delays should be 
// sufficient to meet timing constraint 



delay; 



• 
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delay; 



par 

{ 

flashwe = 1; 
flash_write = 1 ; 

} 



} 



macro proc KReadFlashData(address, data) 
{ 

par 

{ 

flash_write = 0; 

flash_oe = 0; // enable output 

flash_address = address; 

} 

// running at 50/2 MHz - 40 ns cycles - 2 delays should be' 
// sufficient to meet timing constraint 
delay; 
delay; 

data = flash data bus.in; 



} 



macro proc KReadFlashID(flashid, manid) 



par 

{ 

KEnableFlashO; 
KSetFPGAFBMO; 

} 

KWriteFlashData(0, 0x90); 
KReadFlashData(0, manid); 
KReadFlashData(2, flashid); 

par 
{ 

KReleaseFPGAFBM(); 

KDisableFlashO; 

} 



macro proc KReadFlashStatus(status) 

{ 

par 

{ 

KEnableFlashO; 
KSetFPGAFBMO; 

} 



-167- 



KWriteFlashData(0, 0x70); 
KReadFlashData(0, status); 

par 

{ 

KDisableFlashO; 
KReleaseFPGAFBM(); 

} 



///////////////////////////////////// 
// Flash bus arbitration pins 
// 

unsigned 1 fbus_master = 1 with {warn = 0}; // initialise to not master 
interface bus_out() bus_master_line(fbus_master) with BUSMaster_pin; 

macro proc KSetFPGAFBM() 
{ 

fbusmaster = 0; 

} 

macro proc KReleaseFPGAFBMO 
{ 

fbus_master = 1; 
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////////////////////////////////////////////////////////// 
// LED control macros 

unsigned 8 LED = 0 with {warn = 0} ; // by default 
unsigned 1 LEDen = 0 with {warn = 0} ; 

interface bus_ts(unsigned 8) LEDpins(LED, LED en) with LED_pins; 

macro proc KSetLEDs(maskByte) 

{ 

par 
{ 

LED = maskByte; 
LEDen = 1 ; 
} 

} 



llllllllllllllllllllllllllllllllllll 
II 

II FPcom =7 CCLK = High 

// 

// From the FPGA BUSMuster pin should be brought low and the FLASH may be 
// accessed as any normal device RAM device. 

// 

#endif_KOMPRESSOR_LBRARY 



